home *** CD-ROM | disk | FTP | other *** search
/ Technotools / Technotools (Chestnut CD-ROM)(1993).ISO / lang_oth / tasking / randomnu.def < prev    next >
Text File  |  1986-04-02  |  177b  |  10 lines
  1. DEFINITION MODULE RandomNumbers;
  2.  
  3.   EXPORT QUALIFIED srand, irand;
  4.  
  5.   PROCEDURE srand (i: INTEGER);
  6.  
  7.   PROCEDURE irand (limit: INTEGER): INTEGER;
  8.  
  9.   END RandomNumbers.
  10.